## Simulate 10,000 random draws from a standard normal dist
std_norm <- rnorm(n = 10e3, mean = 0, sd = 1)
## Print a summary
summary(std_norm) Min. 1st Qu. Median Mean 3rd Qu. Max.
-3.90934 -0.71116 -0.02291 -0.01625 0.64778 4.10795